home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 73 / 073.d81 / pipes boot (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  928b  |  26 lines
  1. 10 poke53281,0:poke53280,0:print"[147][159]"
  2. 20 gosub1000
  3. 30 sys57812"pipes peak",8,0:poke780,0:poke781,0:poke782,64:sys65493
  4. 40 sys16384
  5. 50 print"[147]":poke53269,0:poke53270,200
  6. 60 poke53271,0:poke53272,21:poke53277,0
  7. 70 open15,8,15,"r0:hello connect=hello connect":input#15,er:close15
  8. 80 ifer<>63thenend
  9. 90 print"[147][144]load"chr$(34)"hello connect"chr$(34)",8"
  10. 100 print"run"
  11. 110 poke631,13:poke632,13:poke198,2:end
  12. 1000 poke214,3:print
  13. 1010 print"[154]           [208] [201] [208] [197] [211]   [208] [197] [193] [203]"
  14. 1020 print"[159]        [193] [210]ush of an [193]rcade [199]ame"
  15. 1030 print"  [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]"
  16. 1040 print"  [152]                                    "
  17. 1050 print"               [208][201][208][197][211] [208][197][193][203]             "
  18. 1060 print"   by [194]ob [194]lackmer   ([195])1989 [211][207][198][212][196][201][211][203] "
  19. 1070 print"        [208]ublished on [204][207][193][196][211][212][193][210] #       "
  20. 1080 print"      [211]ubscriptions 1-800-831-2694    "
  21. 1090 print"            [193]ll [210]ights [210]eserved       "
  22. 1100 print"                                      "
  23. 1110 print"  [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]"
  24. 1120 return
  25. 10000 open15,8,15,"s0:scavenger boot":close15:save"scavenger boot",8:end
  26.